home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-03
/
ivb9203.zip
/
FRMTEST.FRM
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1992-01-30
|
3KB
|
104 lines
frmtest
Call status box
Form1
Command1
Command2
Pie 1
Command3
Pie 2
Command4
Timer1
Form_Click
Form_Load
WindowState
ScaleWidthu
Timer1_Timer
ScaleHeight,
Minimize+
Height
CaptionU
Form_Paint<
Form_DragDrop(
Source4
Form_Resize]
Margin
CurrentX
CurrentYU
IconBar
Minimized
InitIcon
IconInit
thenCall2
IconPie
CenterX
CenterY
Radius
Start
EndPt
AngStart#
AngEnd
Form_MouseDown}
Buttond
Shifts
FillColor
FillStyle
IconInitBar
IconInitPie
Offset
ArcAmount
TextColor
ForeColor
IconPie2
Command1_Click
Command2_Clickf
Command3_Click
IconInitPie2J
IconTypeZ
IPie>
IPie2
Timer1
Interval
Enabled
FALSE
Command4_ClickF
Maximized
NORMAL
Form1
Command1
Visible
Command2
Command3
Command4
thenCaptionk
elsif
frmStat
txtBarPct
frmTest*
txtPicPct8
txtPie1Pct
txtPie2Pct
IPie1|
printer
status
demonstration
Timer1_Timer
Create a random percentage
Control # of new graphs displayed/demo
Command1_Click
The next four instructions initialize this versioni
of the form demonstration
Icon Bar Chart
The next instruction IS the only initialization
instruction you need to set the status value and display
a normal window
Initialize the windowt
Command2_Click
Icon Pie Chart 1
Initialize the windowt
Turn on the demo
Command3_Click
Icon Pie Chart 2
Initialize the windowt
Turn on the demo
Command4_Click